;;;QQ:67762207
[@¸]
{
#IF
#ACT
loadvalue D8 "ϵͳ.INI"  񸱱ʱ

#IF
large D8 %CURHOUR
#ACT
break
#SAY
<$OUTPUT(D8)>Сʱ񸱱.\\
<[   ]/@main>\


#IF
checkhum $00d10162
#ACT
MOV D0 %P9

#IF
checkhum $01d10162
#ACT
MOV D1 %P9

#IF
checkhum $02d10162
#ACT
MOV D2 %P9

#IF
checkhum $03d10162
#ACT
MOV D3 %P9
#if
#say
רΪĳ¶ħ,ͨɸý׶.\
ÿ4Сʱˢһ¶ħ,ᱬκζ.ֻ.\
ÿֻһ˽,2һҪĻ,˫.\
еĽ©ˢ,߲еκ,оǷҪ.\
<һŸ/@gosingunfuben(1)> (<$OUTPUT(D0)>) ȡ30.\\
<Ÿ/@gosingunfuben(2)> (<$OUTPUT(D1)>) ȡ60.\\
<Ÿ/@gosingunfuben(3)> (<$OUTPUT(D2)>) ȡ90.\\
<ĺŸ/@gosingunfuben(4)> (<$OUTPUT(D3)>) ȡ120.\\
<뿪/@exit>

[@gosingunfuben()]
#if
#act
MOV D0 %ARG(1)

#IF
equal D0 1
checkhum $00d10162 1
checkcmd checkuserjf 60
#act
actcmd SETUSERJF - 60 ¸
map $00d10162
break

#IF
equal D0 1
checkhum $00d10162 0
checkcmd checkuserjf 30
#act
actcmd SETUSERJF - 30 ¸
map $00d10162
break

#IF
equal D0 2
checkhum $01d10162 1
checkcmd checkuserjf 120
#act
actcmd SETUSERJF - 120 ¸
map $01d10162
break

#IF
equal D0 2
checkhum $01d10162 0
checkcmd checkuserjf 60
#act
actcmd SETUSERJF - 60 ¸
map $01d10162
break

#IF
equal D0 3
checkhum $02d10162 1
checkcmd checkuserjf 180
#act
actcmd SETUSERJF - 180 ¸
map $02d10162
break

#IF
equal D0 3
checkhum $02d10162 0
checkcmd checkuserjf 90
#act
actcmd SETUSERJF - 90 ¸
map $02d10162
break

#IF
equal D0 4
checkhum $03d10162 1
checkcmd checkuserjf 240
#act
actcmd SETUSERJF - 240 ¸
map $03d10162
break

#IF
equal D0 4
checkhum $03d10162 0
checkcmd checkuserjf 120
#act
actcmd SETUSERJF - 120 ¸
map $03d10162
#elsesay
ԲĻֲ޷!\
<뿪/@exit>
}
;;;QQ:67762207
